Filename	(eval 29)[C:/tmp64ng/perl/lib/JSON/PP.pm:66]
Statements	Executed 27 statements in 0s
Eval Invoked At	C:/tmp64ng/perl/lib/JSON/PP.pm line 66
Sibling evals	1, 2, 3, 4, 5, 6, 7

Subroutines

Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
0	0	0	0s	0s	JSON::PP::::get_indentJSON::PP::get_indent
9	1	1	0s	0s	JSON::PP::::indentJSON::PP::indent

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1
2					# spent 0s within JSON::PP::indent which was called 9 times, avg 0s/call: # 9 times (0s+0s) by JSON::PP::pretty at line 166 of JSON/PP.pm, avg 0s/call sub indent {
3	9	0s			my $enable = defined $_[1] ? $_[1] : 1;
4
5	9	0s			if ($enable) {
6					$_[0]->{PROPS}->[P_INDENT] = 1;
7					}
8					else {
9					$_[0]->{PROPS}->[P_INDENT] = 0;
10					}
11
12	9	0s			$_[0];
13					}
14
15					sub get_indent {
16					$_[0]->{PROPS}->[P_INDENT] ? 1 : '';
17					}
18
19					;